home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / MAL38.ZIP;1 / FOXPRO.ZIP / SCR.FXP (.txt) < prev    next >
Encoding:
MS Visual FoxPro App  |  1994-05-25  |  124.6 KB  |  1,583 lines
  1. Current Index not Ordered
  2.  Press [Enter] for default 
  3.  Press [Esc] to abort  
  4. DO FLD_HELP WITH nFLD
  5. DO FLD_POP1 IN SCR WITH nFLD
  6. KEYBOARD CHR(23) PLAIN
  7. UPPER(M->LAST)f
  8. Enter Last Name: 
  9. M->LASTf
  10. mDUMMYf
  11. .AND.8
  12. LOC_1$UPPER(LAST)
  13. .AND.8
  14. LOC_1=RIGHT(RTRIM(UPPER(LAST)),LEN(LOC_1))
  15. .AND.8
  16. LOC_1=LEFT(LTRIM(UPPER(LAST)),LEN(LOC_1))
  17. .AND.8
  18. LOC_1=UPPER(LAST)
  19. Enter First Name: 
  20. M->FIRSTf
  21. mDUMMYf
  22. .AND.8
  23. LOC_2$UPPER(FIRST)
  24. .AND.8
  25. LOC_2=RIGHT(RTRIM(UPPER(FIRST)),LEN(LOC_2))
  26. .AND.8
  27. LOC_2=LEFT(LTRIM(UPPER(FIRST)),LEN(LOC_2))
  28. .AND.8
  29. LOC_2=UPPER(FIRST)
  30. Enter Birth Date: 
  31. M->BIRTHf
  32. mDUMMYf
  33. .AND.8
  34. LOC_3$DTOC(BIRTH,1)
  35. .AND.8
  36. LOC_3=RIGHT(RTRIM(DTOC(BIRTH,1)),LEN(LOC_3))
  37. .AND.8
  38. LOC_3=LEFT(LTRIM(DTOC(BIRTH,1)),LEN(LOC_3))
  39. .AND.8
  40. LOC_3=DTOC(BIRTH,1)
  41. .AND.8
  42. LOCATE FOR &cLOCATE
  43. IF EOF() .OR. .NOT. (&cFILTER)
  44. Index Key
  45. cSEARCHf
  46.  not found
  47. cFORM_SCRf
  48. DO FLD_SAY&cFORM_SCR
  49.  not found -- but this is close
  50. cFORM_SCRf
  51. DO FLD_SAY&cFORM_SCR
  52. BDISPLAY
  53. BLEFT
  54. BRIGHT
  55. CDISPLAY
  56. CSEARCH
  57. MDUMMY
  58. MVALID
  59. NREC_PTR
  60. DIALOG
  61. CLOCATE
  62. BLOCATE
  63. BLOCATE2
  64. LOC_1
  65. FIRST
  66. LOC_2
  67. BIRTH
  68. LOC_3
  69. BEXACT
  70. PLSWAIT
  71. NORDER
  72. CFILTER
  73. FNFOUND
  74. CVARREAD
  75. CVARREAD
  76. UPPER(M->LAST)f
  77. CSEARCH
  78. FIRST
  79. BIRTH
  80. Current Index not Ordered
  81.  Press [Enter] for default 
  82.  Press [Esc] to abort  
  83. DO FLD_HELP WITH nFLD
  84. DO FLD_POP2 IN SCR WITH nFLD
  85. KEYBOARD CHR(23) PLAIN
  86. M->ZIPf
  87. Enter Billing Zip Code: 
  88. M->ZIPf
  89. mDUMMYf
  90. .AND.8
  91. LOC_4$ZIP
  92. .AND.8
  93. LOC_4=RIGHT(RTRIM(ZIP),LEN(LOC_4))
  94. .AND.8
  95. LOC_4=LEFT(LTRIM(ZIP),LEN(LOC_4))
  96. .AND.8
  97. LOC_4=ZIP
  98. Enter Address One: 
  99. M->ADDR_1f
  100. mDUMMYf
  101. .AND.8
  102. LOC_5$PADR(SUBSTR(UPPER(ADDR_1),AT(' ',ADDR_1)+1),24)+STR(VAL(ADDR_1),6)
  103. .AND.8
  104. LOC_5=RIGHT(RTRIM(PADR(SUBSTR(UPPER(ADDR_1),AT(' ',ADDR_1)+1),24)+STR(VAL(ADDR_1),6)),LEN(LOC_5))
  105. .AND.8
  106. LOC_5=LEFT(LTRIM(PADR(SUBSTR(UPPER(ADDR_1),AT(' ',ADDR_1)+1),24)+STR(VAL(ADDR_1),6)),LEN(LOC_5))
  107. .AND.8
  108. LOC_5=PADR(SUBSTR(UPPER(ADDR_1),AT(' ',ADDR_1)+1),24)+STR(VAL(ADDR_1),6)
  109. .AND.8
  110. LOCATE FOR &cLOCATE
  111. IF EOF() .OR. .NOT. (&cFILTER)
  112. Index Key
  113. cSEARCHf
  114.  not found
  115. cFORM_SCRf
  116. DO FLD_SAY&cFORM_SCR
  117.  not found -- but this is close
  118. cFORM_SCRf
  119. DO FLD_SAY&cFORM_SCR
  120. BDISPLAY
  121. BLEFT
  122. BRIGHT
  123. CDISPLAY
  124. CSEARCH
  125. MDUMMY
  126. MVALID
  127. NREC_PTR
  128. DIALOG
  129. CLOCATE
  130. BLOCATE
  131. BLOCATE2
  132. LOC_4
  133. ADDR_1
  134. LOC_5
  135. BEXACT
  136. PLSWAIT
  137. NORDER
  138. CFILTER
  139. FNFOUND
  140. CVARREAD
  141. CVARREAD
  142. M->ZIPf
  143. CSEARCH
  144. ADDR_1
  145. Current Index not Ordered
  146.  Press [Enter] for default 
  147.  Press [Esc] to abort  
  148. DO FLD_HELP WITH nFLD
  149. DO FLD_POP3 IN SCR WITH nFLD
  150. KEYBOARD CHR(23) PLAIN
  151. M->SZIPf
  152. Enter Shipping Zip Code: 
  153. M->SZIPf
  154. mDUMMYf
  155. .AND.8
  156. LOC_6$SZIP
  157. .AND.8
  158. LOC_6=RIGHT(RTRIM(SZIP),LEN(LOC_6))
  159. .AND.8
  160. LOC_6=LEFT(LTRIM(SZIP),LEN(LOC_6))
  161. .AND.8
  162. LOC_6=SZIP
  163. Enter Address One: 
  164. M->SADDR_1f
  165. mDUMMYf
  166. .AND.8
  167. LOC_7$PADR(SUBSTR(UPPER(SADDR_1),AT(' ',SADDR_1)+1),24)+STR(VAL(SADDR_1),6)
  168. .AND.8
  169. LOC_7=RIGHT(RTRIM(PADR(SUBSTR(UPPER(SADDR_1),AT(' ',SADDR_1)+1),24)+STR(VAL(SADDR_1),6)),LEN(LOC_7))
  170. .AND.8
  171. LOC_7=LEFT(LTRIM(PADR(SUBSTR(UPPER(SADDR_1),AT(' ',SADDR_1)+1),24)+STR(VAL(SADDR_1),6)),LEN(LOC_7))
  172. .AND.8
  173. LOC_7=PADR(SUBSTR(UPPER(SADDR_1),AT(' ',SADDR_1)+1),24)+STR(VAL(SADDR_1),6)
  174. .AND.8
  175. LOCATE FOR &cLOCATE
  176. IF EOF() .OR. .NOT. (&cFILTER)
  177. Index Key
  178. cSEARCHf
  179.  not found
  180. cFORM_SCRf
  181. DO FLD_SAY&cFORM_SCR
  182.  not found -- but this is close
  183. cFORM_SCRf
  184. DO FLD_SAY&cFORM_SCR
  185. BDISPLAY
  186. BLEFT
  187. BRIGHT
  188. CDISPLAY
  189. CSEARCH
  190. MDUMMY
  191. MVALID
  192. NREC_PTR
  193. DIALOG
  194. CLOCATE
  195. BLOCATE
  196. BLOCATE2
  197. LOC_6
  198. SADDR_1
  199. LOC_7
  200. BEXACT
  201. PLSWAIT
  202. NORDER
  203. CFILTER
  204. FNFOUND
  205. CVARREAD
  206. CVARREAD
  207. M->SZIPf
  208. CSEARCH
  209. SADDR_1
  210. Current Index not Ordered
  211.  Press [Enter] for default 
  212.  Press [Esc] to abort  
  213. DO FLD_HELP WITH nFLD
  214. DO FLD_POP4 IN SCR WITH nFLD
  215. KEYBOARD CHR(23) PLAIN
  216. UPPER(M->USER_ID)f
  217. Enter User ID: 
  218. M->USER_IDf
  219. mDUMMYf
  220. .AND.8
  221. LOC_8$UPPER(USER_ID)
  222. .AND.8
  223. LOC_8=RIGHT(RTRIM(UPPER(USER_ID)),LEN(LOC_8))
  224. .AND.8
  225. LOC_8=LEFT(LTRIM(UPPER(USER_ID)),LEN(LOC_8))
  226. .AND.8
  227. LOC_8=UPPER(USER_ID)
  228. Enter Last Name: 
  229. M->LASTf
  230. mDUMMYf
  231. .AND.8
  232. LOC_9$UPPER(LAST)
  233. .AND.8
  234. LOC_9=RIGHT(RTRIM(UPPER(LAST)),LEN(LOC_9))
  235. .AND.8
  236. LOC_9=LEFT(LTRIM(UPPER(LAST)),LEN(LOC_9))
  237. .AND.8
  238. LOC_9=UPPER(LAST)
  239. Enter First Name: 
  240. M->FIRSTf
  241. mDUMMYf
  242. .AND.8
  243. LOC_10$UPPER(FIRST)
  244. .AND.8
  245. LOC_10=RIGHT(RTRIM(UPPER(FIRST)),LEN(LOC_10))
  246. .AND.8
  247. LOC_10=LEFT(LTRIM(UPPER(FIRST)),LEN(LOC_10))
  248. .AND.8
  249. LOC_10=UPPER(FIRST)
  250. .AND.8
  251. LOCATE FOR &cLOCATE
  252. IF EOF() .OR. .NOT. (&cFILTER)
  253. Index Key
  254. cSEARCHf
  255.  not found
  256. cFORM_SCRf
  257. DO FLD_SAY&cFORM_SCR
  258.  not found -- but this is close
  259. cFORM_SCRf
  260. DO FLD_SAY&cFORM_SCR
  261. BDISPLAY
  262. BLEFT
  263. BRIGHT
  264. CDISPLAY
  265. CSEARCH
  266. MDUMMY
  267. MVALID
  268. NREC_PTR
  269. DIALOG
  270. CLOCATE
  271. BLOCATE
  272. BLOCATE2
  273. USER_ID
  274. LOC_8
  275. LOC_9
  276. FIRST
  277. LOC_10
  278. BEXACT
  279. PLSWAIT
  280. NORDER
  281. CFILTER
  282. FNFOUND
  283. CVARREAD
  284. CVARREAD
  285. UPPER(M->USER_ID)f
  286. CSEARCH
  287. USER_ID
  288. FIRST
  289. M->SEXf
  290. M->STATUSf
  291. M->HOUSEf
  292. M->HOMEf
  293. (   )    -    F
  294. (   )    -    8
  295. M->WORKf
  296. (   )    -    F
  297. (   )    -    8
  298. M->SS_NOf
  299.    -  -    F
  300.    -  -    8
  301. M->USER_IDf
  302. M->CITYf
  303. M->STATEf
  304. M->SADDR_1f
  305. M->SADDR_2f
  306. M->SCITYf
  307. M->SSTATEf
  308. M->SZIPf
  309. M->SEXf
  310. M->STATUSf
  311. M->HOMEf
  312. M->WORKf
  313. M->WEDDINGf
  314. M->ACT_DATEf
  315. _CHANGE
  316. _DELETE
  317. BSAVED
  318. MALTER
  319. FNALTER
  320. BEXTRA
  321. CPROGRAM
  322. FNRLOCK
  323. STATUS
  324. HOUSE
  325. SS_NO
  326. ACT_DATE
  327. ALTER
  328. MVALID
  329. USER_ID
  330. STATE
  331. SADDR_1
  332. SADDR_2
  333. SCITY
  334. SSTATE
  335. NEXTKEY
  336. WEDDING
  337. _FLDfF
  338. M->USER_IDf
  339. _FLDfF
  340. M->CITYf
  341. _FLDfF
  342. M->STATEf
  343. mVALIDf
  344. Not a two character state ID
  345. _FLDfF
  346. M->SADDR_1f
  347. _FLDfF
  348. M->SADDR_2f
  349. _FLDfF
  350. M->SCITYf
  351. _FLDfF
  352. M->SSTATEf
  353. mVALIDf
  354. Not a two character state ID
  355. _FLDfF
  356. M->SZIPf
  357. _FLDfF
  358. M->SEXf
  359. mVALIDf
  360. _FLDfF
  361. M->STATUSf
  362. mVALIDf
  363. _FLDfF
  364. M->HOMEf
  365. _FLDfF
  366. M->WORKf
  367. CFLD_DESC
  368. MDESC
  369. MALTER
  370. FNALTER
  371. FLD_POP5
  372. MVALID
  373. USER_ID
  374. FNRLOCK
  375. STATE
  376. FLD_DES5
  377. SADDR_1
  378. ADDR_1
  379. SADDR_2
  380. ADDR_2
  381. SCITY
  382. SSTATE
  383. STATUS
  384. WEDDING
  385. ACT_DATE
  386. _CHANGE
  387. ALTER
  388. TIMEOUT F
  389. TIMEOUT nTO_READ8
  390.  LAST
  391. CLOSE GROW ZOOM SYSTEM
  392.  Press [F10] when done 
  393.  Press [Esc] to abort  
  394. DO FLD_HELP WITH VARREAD()
  395. DO FLD_TAB WITH -1
  396. KEYBOARD CHR(23) PLAIN
  397. CTRL-J
  398. DO JKEY WITH (SET("NEAR") = "ON")
  399. NODELETEF
  400. CTRL-T
  401. DO FLD_DEL WITH .T.
  402. CTRL-HOME
  403. DO FLD_TAB WITH 29
  404. DO FLD_TAB WITH  9
  405. READERROR
  406. BROWSE FIELDS  USER_ID:V=BRV(11):F:W=BRW(11) ,FIRST:V=BRV(12) ,LAST:V=BRV(13) ,ADDR_1:V=BRV(16) ,ADDR_2:V=BRV(17) ,CITY:V=BRV(18):F:W=BRW(18) ,STATE:V=BRV(19):F:P="!!":W=BRW(19) ,ZIP:V=BRV(20) ,SADDR_1:V=BRV(21):F:W=BRW(21) ,SADDR_2:V=BRV(22):F:W=BRW(22) ,SCITY:V=BRV(23):F:W=BRW(23) ,SSTATE:V=BRV(24):F:P="!!":W=BRW(24) ,SZIP:V=BRV(25):F:W=BRW(25) ,SEX:V=BRV(26):F:P="!":W=BRW(26) ,STATUS:V=BRV(27):F:P="!":W=BRW(27) ,HOUSE:V=BRV(28):P="Y" ,HOME:V=BRV(29):F:P="(999) 999-9999":W=BRW(29) ,WORK:V=BRV(30):F:P="(999) 999-9999":W=BRW(30) ,SS_NO:V=BRV(31):P="999-99-9999" ,BIRTH:V=BRV(32):P="@D" ,WEDDING:V=BRV(34):P="@D":W=BRW(34) ,ACT_DATE:P="@D":W=.F. ,BOL_1:P="Y":V=BRV(36) ,BOL_2:P="Y":V=BRV(37) ,BOL_3:P="Y":V=BRV(38) ,MESS:V=BRV(39) &cBROWSE WINDOW (cNAME) &cREAD WHEN BRW(0) VALID:F BRV(0)
  407. NEARz
  408. ON READERROR &cREAD_ERR
  409. CWINDOW
  410. _JDBLCLICKFLD
  411. _DESC
  412. BDISPLAY
  413. BSAVED
  414. CNAME
  415. CREAD
  416. CREAD_ERR
  417. CTITLE
  418. NFLD_BEG
  419. NFLD_END
  420. MALTER
  421. MDUMMY
  422. NLEVEL
  423. KCBROWSE
  424. BMULT
  425. FNGETENV
  426. NSCHEME
  427. WINDOW
  428. DIALOG
  429.  Press [F10] when done 
  430.  Press [Esc] to abort  
  431. DO FLD_HELP WITH nFLD
  432. DO FLD_POP5 IN SCR WITH nFLD
  433. KEYBOARD CHR(23) PLAIN
  434. MOUSE
  435. DO FLD_MOUSE WITH .F.
  436. RIGHTMOUSE
  437. DO FLD_MOUSE WITH .T.
  438. Enter Company ID or Family ID
  439.  Press [F2] for popup 
  440. Enter First Name/Middle Initials
  441. Enter Last name
  442. Enter First Address Line
  443. Enter Second Address Line
  444. Enter City Name
  445.  Press [F2] for popup 
  446. Enter Two Character Abbreviation
  447.  Press [F2] for popup 
  448. mVALIDf
  449. Not a two character state ID
  450. Enter Zip Code
  451. Enter First Shipping Address Line
  452. Enter Second Shipping Address Line
  453. Enter Shipping City Name
  454.  Press [F2] for popup 
  455. Enter Two Character Abbreviation
  456.  Press [F2] for popup 
  457. mVALIDf
  458. Not a two character state ID
  459. Enter Shipping Zip Code
  460. Select [M]ale, or [F]emale
  461. mVALIDf
  462. Select [S]ingle or [M]arried
  463. mVALIDf
  464. Head of Household (Y or N)? 
  465. Enter home phone number
  466. (999) 999-9999
  467. (999) 999-9999
  468. (999) 999-9999
  469. Enter work phone number
  470. (999) 999-9999
  471. (999) 999-9999
  472. (999) 999-9999
  473. Enter Social Security Number
  474. 999-99-9999
  475. 999-99-9999
  476. 999-99-9999
  477. Enter Birth Date
  478. Enter Wedding Date
  479. Enter Brief Note
  480.  Press [F10] to exit field 
  481.  Press [Esc] to abort 
  482. CWINDOW
  483. CLICKBMEMO
  484. CFLD_DESC
  485. MDESC
  486. MVALID
  487. NFLD_KEY
  488. NSAY_COL
  489. NSAY_ROW
  490. DIALOG
  491. MOUSE
  492. RIGHTMOUSEBSAVED
  493. ACT_DATE
  494. NFLD_BEG
  495. WEDDING
  496. STATUS
  497. FLD_DES5
  498. FLD_SAY5
  499. NFLD_END
  500. FLD_UQS
  501. BMULT
  502. USER_ID
  503. NTO_READ
  504. FNALTERR
  505. FLD_SET
  506. FIRST
  507. ADDR_1
  508. ADDR_2
  509. STATE
  510. FLD_POP5
  511. SADDR_1
  512. SADDR_2
  513. SCITY
  514. SSTATE
  515. HOUSE
  516. SS_NO
  517. BIRTH
  518. CPR_FLD12
  519. BOL_1
  520. CPR_FLD11
  521. CPR_FLD22
  522. BOL_2
  523. CPR_FLD21
  524. CPR_FLD32
  525. BOL_3
  526. CPR_FLD31
  527. MEMO39
  528. NLEVEL
  529. PLSWAIT
  530. APPEND
  531. FNRLOCK
  532. ALTER
  533. MALTER
  534. FNFILE
  535. cVARREADf
  536. STATE
  537. SSTATE
  538. STATUS
  539. BIRTH
  540. WEDDING
  541. nFLDf
  542.                       
  543. ALASKA                
  544. ALABAMA               
  545. ARKANSAS              
  546. ARIZONIA              
  547. CALIFORNIA            
  548. CANADA                
  549. COLORADO              
  550. CONNECTICUT           
  551. DIST. OF COLUMBIA     
  552. DELAWARE              
  553. SOUTH DAKOTA          
  554. FLORIDA               
  555. GEORGIA               
  556. GUAM                  
  557. HAWAII                
  558. IOWA                  
  559. IDAHO                 
  560. ILLINOIS              
  561. INDIANA               
  562. KANSAS                
  563. KENTUCKY              
  564. LOUISIANA             
  565. MASSACHUSETTS         
  566. MARYLAND              
  567. MAINE                 
  568. MICHIGAN              
  569. MINNESOTA             
  570. MISSOURI              
  571. MISSISSIPPI           
  572. MONTANA               
  573. NORTH CAROLINA        
  574. NORTH DAKOTA          
  575. NEBRASKA              
  576. NEW HAMPSHIRE         
  577. NEW JERSEY            
  578. NEW MEXICO            
  579. NEW YORK              
  580. OHIO                  
  581. OKLAHOMA              
  582. OREGON                
  583. PENNSYLVANIA          
  584. PUERTO RICO           
  585. RHODE ISLAND          
  586. SOUTH CAROLINA        
  587. TENNESSEE             
  588. TEXAS                 
  589. UTAH                  
  590. VIRGINIA              
  591. VIRGIN ISLANDS        
  592. VERMONT               
  593. WASHINGTON            
  594. WISCONSIN             
  595. WEST VIRGINIA         
  596. WYOMING               
  597.                       
  598. ALASKA                
  599. ALABAMA               
  600. ARKANSAS              
  601. ARIZONIA              
  602. CALIFORNIA            
  603. CANADA                
  604. COLORADO              
  605. CONNECTICUT           
  606. DIST. OF COLUMBIA     
  607. DELAWARE              
  608. SOUTH DAKOTA          
  609. FLORIDA               
  610. GEORGIA               
  611. GUAM                  
  612. HAWAII                
  613. IOWA                  
  614. IDAHO                 
  615. ILLINOIS              
  616. INDIANA               
  617. KANSAS                
  618. KENTUCKY              
  619. LOUISIANA             
  620. MASSACHUSETTS         
  621. MARYLAND              
  622. MAINE                 
  623. MICHIGAN              
  624. MINNESOTA             
  625. MISSOURI              
  626. MISSISSIPPI           
  627. MONTANA               
  628. NORTH CAROLINA        
  629. NORTH DAKOTA          
  630. NEBRASKA              
  631. NEW HAMPSHIRE         
  632. NEW JERSEY            
  633. NEW MEXICO            
  634. NEW YORK              
  635. OHIO                  
  636. OKLAHOMA              
  637. OREGON                
  638. PENNSYLVANIA          
  639. PUERTO RICO           
  640. RHODE ISLAND          
  641. SOUTH CAROLINA        
  642. TENNESSEE             
  643. TEXAS                 
  644. UTAH                  
  645. VIRGINIA              
  646. VIRGIN ISLANDS        
  647. VERMONT               
  648. WASHINGTON            
  649. WISCONSIN             
  650. WEST VIRGINIA         
  651. WYOMING               
  652.  Female 
  653.  Male   
  654.  Married 
  655.  Single  
  656. cDESCf
  657. CVARREAD
  658. CDESC
  659. LICKMVALID
  660. CFLD_DESC
  661. STATE
  662. SSTATE
  663. STATUS
  664. FNAGE
  665. BIRTH
  666. WEDDING
  667. KEYBOARD CHR(23) PLAIN
  668. cVARREADf
  669. USER_ID
  670. STATE
  671. SCITY
  672. SSTATE
  673. STATUS
  674. nFLDf
  675. DO FLD_HELP WITH nFLD
  676.  No records on file 
  677.  Press [Enter] to Select 
  678. DEACTIVATE POPUP POP_UP
  679. BAR18f
  680. Ceder SpringsF
  681. DetroitF
  682. Grand RapidsF
  683. LansingF
  684. MuskegonF
  685. Ceder Springs
  686. Detroit
  687. Grand Rapids
  688. Lansing
  689. Muskegon
  690.  Press [Enter] to Select 
  691. DEACTIVATE POPUP POP_UP
  692. Ceder SpringsF
  693. DetroitF
  694. Grand RapidsF
  695. LansingF
  696. MuskegonF
  697. BAR19f
  698.                       
  699. ALASKA                
  700. ALABAMA               
  701. ARKANSAS              
  702. ARIZONIA              
  703. CALIFORNIA            
  704. CANADA                
  705. COLORADO              
  706. CONNECTICUT           
  707. DIST. OF COLUMBIA     
  708. DELAWARE              
  709. SOUTH DAKOTA          
  710. FLORIDA               
  711. GEORGIA               
  712. GUAM                  
  713. HAWAII                
  714. IOWA                  
  715. IDAHO                 
  716. ILLINOIS              
  717. INDIANA               
  718. KANSAS                
  719. KENTUCKY              
  720. LOUISIANA             
  721. MASSACHUSETTS         
  722. MARYLAND              
  723. MAINE                 
  724. MICHIGAN              
  725. MINNESOTA             
  726. MISSOURI              
  727. MISSISSIPPI           
  728. MONTANA               
  729. NORTH CAROLINA        
  730. NORTH DAKOTA          
  731. NEBRASKA              
  732. NEW HAMPSHIRE         
  733. NEW JERSEY            
  734. NEW MEXICO            
  735. NEW YORK              
  736. OHIO                  
  737. OKLAHOMA              
  738. OREGON                
  739. PENNSYLVANIA          
  740. PUERTO RICO           
  741. RHODE ISLAND          
  742. SOUTH CAROLINA        
  743. TENNESSEE             
  744. TEXAS                 
  745. UTAH                  
  746. VIRGINIA              
  747. VIRGIN ISLANDS        
  748. VERMONT               
  749. WASHINGTON            
  750. WISCONSIN             
  751. WEST VIRGINIA         
  752. WYOMING               
  753.  Press [Enter] to Select 
  754. DEACTIVATE POPUP POP_UP
  755. BAR23f
  756. Ceder SpringsF
  757. DetroitF
  758. Grand RapidsF
  759. LansingF
  760. MuskegonF
  761. Ceder Springs
  762. Detroit
  763. Grand Rapids
  764. Lansing
  765. Muskegon
  766.  Press [Enter] to Select 
  767. DEACTIVATE POPUP POP_UP
  768. Ceder SpringsF
  769. DetroitF
  770. Grand RapidsF
  771. LansingF
  772. MuskegonF
  773. BAR24f
  774.                       
  775. ALASKA                
  776. ALABAMA               
  777. ARKANSAS              
  778. ARIZONIA              
  779. CALIFORNIA            
  780. CANADA                
  781. COLORADO              
  782. CONNECTICUT           
  783. DIST. OF COLUMBIA     
  784. DELAWARE              
  785. SOUTH DAKOTA          
  786. FLORIDA               
  787. GEORGIA               
  788. GUAM                  
  789. HAWAII                
  790. IOWA                  
  791. IDAHO                 
  792. ILLINOIS              
  793. INDIANA               
  794. KANSAS                
  795. KENTUCKY              
  796. LOUISIANA             
  797. MASSACHUSETTS         
  798. MARYLAND              
  799. MAINE                 
  800. MICHIGAN              
  801. MINNESOTA             
  802. MISSOURI              
  803. MISSISSIPPI           
  804. MONTANA               
  805. NORTH CAROLINA        
  806. NORTH DAKOTA          
  807. NEBRASKA              
  808. NEW HAMPSHIRE         
  809. NEW JERSEY            
  810. NEW MEXICO            
  811. NEW YORK              
  812. OHIO                  
  813. OKLAHOMA              
  814. OREGON                
  815. PENNSYLVANIA          
  816. PUERTO RICO           
  817. RHODE ISLAND          
  818. SOUTH CAROLINA        
  819. TENNESSEE             
  820. TEXAS                 
  821. UTAH                  
  822. VIRGINIA              
  823. VIRGIN ISLANDS        
  824. VERMONT               
  825. WASHINGTON            
  826. WISCONSIN             
  827. WEST VIRGINIA         
  828. WYOMING               
  829.  Press [Enter] to Select 
  830. DEACTIVATE POPUP POP_UP
  831. BAR26f
  832.  Female 
  833.  Male   
  834.  Press [Enter] to Select 
  835. DEACTIVATE POPUP POP_UP
  836. BAR27f
  837.  Married 
  838.  Single  
  839.  Press [Enter] to Select 
  840. DEACTIVATE POPUP POP_UP
  841. CVARREAD
  842. LICKFLD
  843. CFILTER_
  844. MDUMMY
  845. NLASTKEY
  846. RREAD
  847. USER_ID
  848. POP_UP
  849. DIALOG
  850. BAR18
  851. OUSESTATE
  852. BAR19
  853. SCITY
  854. BAR23
  855. SSTATE
  856. BAR24
  857. BAR26
  858. STATUS
  859. BAR27
  860. NEXTKEY
  861. M->SEXf
  862. M->STATUSf
  863. M->HOUSEf
  864. M->HOMEf
  865. (   )    -    F
  866. (   )    -    8
  867. M->WORKf
  868. (   )    -    F
  869. (   )    -    8
  870. M->SS_NOf
  871.    -  -    F
  872.    -  -    8
  873. (999) 999-9999
  874. (999) 999-9999
  875. 999-99-9999
  876. MEMO39f
  877. MEMO39
  878. DEFINE WINDOW MEMO39 AT nSAY_ROW,nSAY_COL SIZE nROW-nSAY_ROW-1,nCOL-nSAY_COL-1 CLOSE FLOAT GROW ZOOM TITLE " Message Memo " &cFONTS
  879. CWINDOW
  880. NWINDOW
  881. CKBMEMO
  882. CFONTS
  883. CFLD_DESC
  884. MDESC
  885. MVALID
  886. NSAY_COL
  887. NSAY_ROW
  888. BDISPLAY
  889. SBLANK
  890. FNFOUND
  891. MALTER
  892. FNALTER
  893. OUSESTATUS
  894. HOUSE
  895. SS_NO
  896. ACT_DATE
  897. WEDDING
  898. BAR11
  899. USER_ID
  900. FIRST
  901. ADDR_1
  902. ADDR_2
  903. BAR18
  904. BAR19
  905. FLD_DES5
  906. STATE
  907. _DESC
  908. SADDR_1
  909. SADDR_2
  910. BAR23
  911. SCITY
  912. BAR24
  913. SSTATE
  914. BAR26
  915. BAR27
  916. BIRTH
  917. BOL_1
  918. CPR_FLD11
  919. BOL_2
  920. CPR_FLD21
  921. BOL_3
  922. CPR_FLD31
  923. MEMO39
  924. FNFILE
  925. FNFONTS
  926. NLEVEL
  927. (999) 999-9999
  928. (999) 999-9999
  929. 999-99-9999
  930. CFLD_DESC
  931. USER_ID
  932. FIRST
  933. ADDR_1
  934. ADDR_2
  935. STATE
  936. FLD_DES5
  937. _DESC
  938. SADDR_1
  939. SADDR_2
  940. SCITY
  941. SSTATE
  942. STATUS
  943. HOUSE
  944. SS_NO
  945. BIRTH
  946. WEDDING
  947. ACT_DATE
  948. BOL_1
  949. CPR_FLD11
  950. BOL_2
  951. CPR_FLD21
  952. BOL_3
  953. CPR_FLD31
  954. User ID   : 
  955. First Name: 
  956. Last: 
  957. Billing Address
  958. Shipping Address
  959. Address 1 : 
  960. Address 2 : 
  961. City/State: 
  962.        Zip: 
  963. Sex: 
  964. Status: 
  965. Head of HouseHold: 
  966. Home Phone: 
  967. Work Phone: 
  968. Social Security: 
  969.      Birth: 
  970.    Wedding: 
  971.    Wedding: 
  972.     Active: 
  973. fffff
  974. NMOUSE
  975. NFLD_BEG
  976. NFLD_END
  977. Current Index not Ordered
  978.  Press [Enter] for default 
  979.  Press [Esc] to abort  
  980. DO FLD_HELP WITH nFLD
  981. DO FLD_POP6 IN SCR WITH nFLD
  982. KEYBOARD CHR(23) PLAIN
  983. UPPER(M->USER_ID)f
  984. Enter User ID: 
  985. M->USER_IDf
  986. mDUMMYf
  987. .AND.8
  988. LOC_41$UPPER(USER_ID)
  989. .AND.8
  990. LOC_41=RIGHT(RTRIM(UPPER(USER_ID)),LEN(LOC_41))
  991. .AND.8
  992. LOC_41=LEFT(LTRIM(UPPER(USER_ID)),LEN(LOC_41))
  993. .AND.8
  994. LOC_41=UPPER(USER_ID)
  995. .AND.8
  996. LOCATE FOR &cLOCATE
  997. IF EOF() .OR. .NOT. (&cFILTER)
  998. Index Key
  999. cSEARCHf
  1000.  not found
  1001. cFORM_SCRf
  1002. DO FLD_SAY&cFORM_SCR
  1003.  not found -- but this is close
  1004. cFORM_SCRf
  1005. DO FLD_SAY&cFORM_SCR
  1006. BDISPLAY
  1007. BLEFT
  1008. BRIGHT
  1009. CDISPLAY
  1010. CSEARCH
  1011. MDUMMY
  1012. MVALID
  1013. NREC_PTR
  1014. DIALOG
  1015. CLOCATE
  1016. BLOCATE
  1017. BLOCATE2
  1018. USER_ID
  1019. LOC_41
  1020. BEXACT
  1021. PLSWAIT
  1022. NORDER
  1023. CFILTER
  1024. FNFOUND
  1025. CVARREAD
  1026. CVARREAD
  1027. UPPER(M->USER_ID)f
  1028. CSEARCH
  1029. USER_ID
  1030. _CHANGE
  1031. _DELETE
  1032. BSAVED
  1033. MALTER
  1034. FNALTER
  1035. BEXTRA
  1036. CPROGRAM
  1037. FNRLOCK
  1038. MVALID
  1039. CFLD_DESC
  1040. MDESC
  1041. MALTER
  1042. FNALTER
  1043. MVALID
  1044. _CHANGE
  1045. ALTER
  1046. TIMEOUT F
  1047. TIMEOUT nTO_READ8
  1048.  LAST
  1049. CLOSE GROW ZOOM SYSTEM
  1050.  Press [F10] when done 
  1051.  Press [Esc] to abort  
  1052. DO FLD_HELP WITH VARREAD()
  1053. DO FLD_TAB WITH -1
  1054. KEYBOARD CHR(23) PLAIN
  1055. CTRL-J
  1056. DO JKEY WITH (SET("NEAR") = "ON")
  1057. NODELETEF
  1058. CTRL-T
  1059. DO FLD_DEL WITH .T.
  1060. CTRL-HOME
  1061. DO FLD_TAB WITH 29
  1062. DO FLD_TAB WITH  9
  1063. READERROR
  1064. BROWSE FIELDS  USER_ID:V=BRV(42) &cBROWSE WINDOW (cNAME) &cREAD WHEN BRW(0) VALID:F BRV(0)
  1065. NEARz
  1066. ON READERROR &cREAD_ERR
  1067. CWINDOW
  1068. _JDBLCLICKFLD
  1069. _DESC
  1070. BDISPLAY
  1071. BSAVED
  1072. CNAME
  1073. CREAD
  1074. CREAD_ERR
  1075. CTITLE
  1076. NFLD_BEG
  1077. NFLD_END
  1078. MALTER
  1079. MDUMMY
  1080. NLEVEL
  1081. KCBROWSE
  1082. BMULT
  1083. FNGETENV
  1084. NSCHEME
  1085. WINDOW
  1086. DIALOG
  1087. ILTER
  1088.  Press [F10] when done 
  1089.  Press [Esc] to abort  
  1090. DO FLD_HELP WITH nFLD
  1091. DO FLD_POP7 IN SCR WITH nFLD
  1092. KEYBOARD CHR(23) PLAIN
  1093. MOUSE
  1094. DO FLD_MOUSE WITH .F.
  1095. RIGHTMOUSE
  1096. DO FLD_MOUSE WITH .T.
  1097. Enter Company ID or Family ID
  1098. CWINDOW
  1099. CLICKBMEMO
  1100. CFLD_DESC
  1101. MDESC
  1102. MVALID
  1103. NFLD_KEY
  1104. NSAY_COL
  1105. NSAY_ROW
  1106. DIALOG
  1107. MOUSE
  1108. RIGHTMOUSEBSAVED
  1109. NFLD_BEG
  1110. FLD_SAY7
  1111. NFLD_END
  1112. FLD_UQS
  1113. BMULT
  1114. USER_ID
  1115. NTO_READ
  1116. FNALTERR
  1117. FLD_SET
  1118. PLSWAIT
  1119. APPEND
  1120. FNRLOCK
  1121. ALTER
  1122. MALTER
  1123. CVARREAD
  1124. CVARREAD
  1125. CWINDOW
  1126. NWINDOW
  1127. CKBMEMO
  1128. CFONTS
  1129. CFLD_DESC
  1130. MDESC
  1131. MVALID
  1132. NSAY_COL
  1133. NSAY_ROW
  1134. BDISPLAY
  1135. SBLANK
  1136. FNFOUND
  1137. MALTER
  1138. FNALTER
  1139. USER_ID
  1140. CFLD_DESC
  1141. USER_ID
  1142. User ID   : 
  1143. NMOUSE
  1144. NFLD_BEG
  1145. NFLD_END
  1146. *HT \!\?\<Ascending;\<Descending
  1147. CFLD_DESC
  1148. USER_ID
  1149. FIRST
  1150. ADDR_1
  1151. ADDR_2
  1152. STATE
  1153. FLD_DES15
  1154. _DESC
  1155. CADDR_TYPESEX
  1156. _DESC
  1157. STATUS
  1158. HOUSE
  1159. BIRTH
  1160. BIRTH2
  1161. WEDDING
  1162. SEWEDDING2
  1163. ACT_DATE
  1164. ACT_DATE2
  1165. BOL_1
  1166. CPR_FLD11
  1167. BOL_2
  1168. CPR_FLD21
  1169. BOL_3
  1170. CPR_FLD31
  1171. NINDEX
  1172. NORDER
  1173. User ID   : 
  1174. First Name: 
  1175. Last: 
  1176. Address 1 : 
  1177. Address 2 : 
  1178. City/State: 
  1179.        Zip: 
  1180.   Address Type: 
  1181. Sex: 
  1182. Status: 
  1183. Head of HouseHold: 
  1184.      Birth: 
  1185.    Wedding: 
  1186.     Active: 
  1187.  Message Wildcard 
  1188. Index: 
  1189. Order: 
  1190. NMOUSE
  1191. NFLD_BEG
  1192. NFLD_END
  1193.  Press [F10] when done 
  1194.  Press [Esc] to abort  
  1195. DO FLD_HELP WITH nFLD
  1196. DO FLD_POP15 IN SCR WITH nFLD
  1197. KEYBOARD CHR(23) PLAIN
  1198. MOUSE
  1199. DO FLD_MOUSE WITH .F.
  1200. RIGHTMOUSE
  1201. DO FLD_MOUSE WITH .T.
  1202. Enter Company ID or Family ID
  1203.  Press [F2] for popup 
  1204. Enter First Name/Middle Initials
  1205. Enter Last name
  1206. Enter First Address Line
  1207. Enter Second Address Line
  1208. Enter City Name
  1209.  Press [F2] for popup 
  1210. Enter Two Character Abbreviation
  1211.  Press [F2] for popup 
  1212. mVALIDf
  1213. Not a two character state ID
  1214. Enter Zip Code
  1215. Enter [B]illing, or [S]hipping Address to use in option grid
  1216.  Press [F2] for popup 
  1217. mVALIDf
  1218. Select [M]ale, or [F]emale
  1219. Select [S]ingle or [M]arried
  1220. Head of Household (Y or N)? 
  1221. mVALIDf
  1222. Enter Begining Birth Date
  1223. Enter Ending Birth Date
  1224. Enter Begining Wedding Date
  1225. Enter Ending Wedding Date
  1226. Enter Begining Active Date
  1227. Enter Ending Active Date
  1228. Press [Tab] to exit field
  1229.  Press [Tab] or [Shift]-[Tab] 
  1230.  to exit field 
  1231. Select Index File
  1232. mVALIDf
  1233. Select Index Order
  1234. *HT \!\?\<Ascending;\<Descending
  1235. *HT \!\?\<Ascending;\<Descending
  1236. CWINDOW
  1237. BMEMO
  1238. CFLD_DESC
  1239. MDESC
  1240. MVALID
  1241. NFLD_KEY
  1242. NSAY_COL
  1243. NSAY_ROW
  1244. EDIALOG
  1245. MOUSE
  1246. RIGHTMOUSEBSAVED
  1247. NFLD_BEG
  1248. OPT_TXT15
  1249. FLD11
  1250. OPT_SAY15
  1251. NFLD_END
  1252. USER_ID
  1253. FLD_SET
  1254. FIRST
  1255. ADDR_1
  1256. ADDR_2
  1257. STATE
  1258. FLD_DES15
  1259. FLD_POP15
  1260. CADDR_TYPESEX
  1261. STATUS
  1262. HOUSE
  1263. BIRTH
  1264. BIRTH2
  1265. WEDDING
  1266. WEDDING2
  1267. ACT_DATE
  1268. ACT_DATE2
  1269. CPR_FLD12
  1270. BOL_1
  1271. CPR_FLD11
  1272. CPR_FLD22
  1273. BOL_2
  1274. CPR_FLD21
  1275. CPR_FLD32
  1276. BOL_3
  1277. CPR_FLD31
  1278. NINDEX
  1279. NORDER
  1280. cVARREADf
  1281. M->STATE
  1282. CADDR_TYPE
  1283. NINDEX
  1284. nFLDf
  1285.                       
  1286. ALASKA                
  1287. ALABAMA               
  1288. ARKANSAS              
  1289. ARIZONIA              
  1290. CALIFORNIA            
  1291. CANADA                
  1292. COLORADO              
  1293. CONNECTICUT           
  1294. DIST. OF COLUMBIA     
  1295. DELAWARE              
  1296. SOUTH DAKOTA          
  1297. FLORIDA               
  1298. GEORGIA               
  1299. GUAM                  
  1300. HAWAII                
  1301. IOWA                  
  1302. IDAHO                 
  1303. ILLINOIS              
  1304. INDIANA               
  1305. KANSAS                
  1306. KENTUCKY              
  1307. LOUISIANA             
  1308. MASSACHUSETTS         
  1309. MARYLAND              
  1310. MAINE                 
  1311. MICHIGAN              
  1312. MINNESOTA             
  1313. MISSOURI              
  1314. MISSISSIPPI           
  1315. MONTANA               
  1316. NORTH CAROLINA        
  1317. NORTH DAKOTA          
  1318. NEBRASKA              
  1319. NEW HAMPSHIRE         
  1320. NEW JERSEY            
  1321. NEW MEXICO            
  1322. NEW YORK              
  1323. OHIO                  
  1324. OKLAHOMA              
  1325. OREGON                
  1326. PENNSYLVANIA          
  1327. PUERTO RICO           
  1328. RHODE ISLAND          
  1329. SOUTH CAROLINA        
  1330. TENNESSEE             
  1331. TEXAS                 
  1332. UTAH                  
  1333. VIRGINIA              
  1334. VIRGIN ISLANDS        
  1335. VERMONT               
  1336. WASHINGTON            
  1337. WISCONSIN             
  1338. WEST VIRGINIA         
  1339. WYOMING               
  1340.  Billing  Address 
  1341.  Shipping Address 
  1342.  Last Name 
  1343.  Billing  Zip Code  
  1344.  Shipping Zip Code  
  1345.  User ID   
  1346. cDESCf
  1347. CVARREAD
  1348. CDESC
  1349. MVALID
  1350. CFLD_DESC
  1351. STATE
  1352. CADDR_TYPENINDEX
  1353. YPENDBF
  1354. KEYBOARD CHR(23) PLAIN
  1355. cVARREADf
  1356. M->USER_ID
  1357. M->CITY
  1358. M->STATE
  1359. cADDR_TYPE
  1360. nINDEX
  1361. nFLDf
  1362. DO FLD_HELP WITH nFLD
  1363.  No records on file 
  1364.  Press [Enter] to Select 
  1365. DEACTIVATE POPUP POP_UP
  1366. BAR48f
  1367. Ceder SpringsF
  1368. DetroitF
  1369. Grand RapidsF
  1370. LansingF
  1371. MuskegonF
  1372. Ceder Springs
  1373. Detroit
  1374. Grand Rapids
  1375. Lansing
  1376. Muskegon
  1377.  Press [Enter] to Select 
  1378. DEACTIVATE POPUP POP_UP
  1379. Ceder SpringsF
  1380. DetroitF
  1381. Grand RapidsF
  1382. LansingF
  1383. MuskegonF
  1384. BAR49f
  1385.                       
  1386. ALASKA                
  1387. ALABAMA               
  1388. ARKANSAS              
  1389. ARIZONIA              
  1390. CALIFORNIA            
  1391. CANADA                
  1392. COLORADO              
  1393. CONNECTICUT           
  1394. DIST. OF COLUMBIA     
  1395. DELAWARE              
  1396. SOUTH DAKOTA          
  1397. FLORIDA               
  1398. GEORGIA               
  1399. GUAM                  
  1400. HAWAII                
  1401. IOWA                  
  1402. IDAHO                 
  1403. ILLINOIS              
  1404. INDIANA               
  1405. KANSAS                
  1406. KENTUCKY              
  1407. LOUISIANA             
  1408. MASSACHUSETTS         
  1409. MARYLAND              
  1410. MAINE                 
  1411. MICHIGAN              
  1412. MINNESOTA             
  1413. MISSOURI              
  1414. MISSISSIPPI           
  1415. MONTANA               
  1416. NORTH CAROLINA        
  1417. NORTH DAKOTA          
  1418. NEBRASKA              
  1419. NEW HAMPSHIRE         
  1420. NEW JERSEY            
  1421. NEW MEXICO            
  1422. NEW YORK              
  1423. OHIO                  
  1424. OKLAHOMA              
  1425. OREGON                
  1426. PENNSYLVANIA          
  1427. PUERTO RICO           
  1428. RHODE ISLAND          
  1429. SOUTH CAROLINA        
  1430. TENNESSEE             
  1431. TEXAS                 
  1432. UTAH                  
  1433. VIRGINIA              
  1434. VIRGIN ISLANDS        
  1435. VERMONT               
  1436. WASHINGTON            
  1437. WISCONSIN             
  1438. WEST VIRGINIA         
  1439. WYOMING               
  1440.  Press [Enter] to Select 
  1441. DEACTIVATE POPUP POP_UP
  1442. BAR51f
  1443.  Billing  Address 
  1444.  Shipping Address 
  1445.  Press [Enter] to Select 
  1446. DEACTIVATE POPUP POP_UP
  1447. BAR67f
  1448.  Last Name 
  1449.  Billing  Zip Code  
  1450.  Shipping Zip Code  
  1451.  User ID   
  1452.  Press [Enter] to Select 
  1453. DEACTIVATE POPUP POP_UP
  1454. CVARREAD
  1455. CFILTER_
  1456. MDUMMY
  1457. NLASTKEY
  1458. ENDBF
  1459. YPENFLD
  1460. RREAD
  1461. USER_ID
  1462. EUSER
  1463. POP_UP
  1464. DIALOG
  1465. BAR48
  1466. OUSESTATE
  1467. BAR49
  1468. CADDR_TYPEBAR51
  1469. NINDEX
  1470. YPEBAR67
  1471. NEXTKEY
  1472. *HT \!\?\<Ascending;\<Descending
  1473. CWINDOW
  1474. NWINDOW
  1475. BMEMO
  1476. CFONTS
  1477. CFLD_DESC
  1478. MDESC
  1479. MVALID
  1480. ENCOL
  1481. YPENROW
  1482. NSAY_COL
  1483. NSAY_ROW
  1484. BDISPLAY
  1485. SBLANK
  1486. BAR43
  1487. USER_ID
  1488. FIRST
  1489. ADDR_1
  1490. USEADDR_2
  1491. BAR48
  1492. _TYPEBAR49
  1493. FLD_DES15
  1494. STATE
  1495. _DESC
  1496. BAR51
  1497. CADDR_TYPESEX
  1498. STATUS
  1499. HOUSE
  1500. BIRTH
  1501. BIRTH2
  1502. WEDDING
  1503. WEDDING2
  1504. ACT_DATE
  1505. ACT_DATE2
  1506. BOL_1
  1507. CPR_FLD11
  1508. BOL_2
  1509. TYPECPR_FLD21
  1510. BOL_3
  1511. CPR_FLD31
  1512. BAR67
  1513. NINDEX
  1514. NORDER
  1515. BSAVED
  1516. USER_ID
  1517. FIRST
  1518. ADDR_1
  1519. ADDR_2
  1520. ECITY
  1521. YPESTATE
  1522. CADDR_TYPESEX
  1523. STATUS
  1524. HOUSE
  1525. BIRTH
  1526. BIRTH2
  1527. WEDDING
  1528. WEDDING2
  1529. ACT_DATE
  1530. EACT_DATE2
  1531. BOL_1
  1532. BOL_2
  1533. TYPEBOL_3
  1534. NINDEX
  1535. NORDER
  1536. FLD_FND1
  1537. FLD_DES1
  1538. FLD_POP1
  1539. FLD_UNQ1
  1540. FLD_FND2
  1541. FLD_DES2
  1542. FLD_POP2
  1543. FLD_UNQ2
  1544. FLD_FND3
  1545. FLD_DES3
  1546. FLD_POP3
  1547. FLD_UNQ3
  1548. FLD_FND4
  1549. FLD_DES4
  1550. FLD_POP4
  1551. FLD_UNQ4
  1552. MY,2) 
  1553.      S
  1554. FLD_BRO5
  1555. FLD_GET5
  1556. FLD_DES5
  1557. FLD_POP5
  1558. FLD_SAY5
  1559. FLD_SHW5
  1560. FLD_TXT5
  1561. FLD_FND6
  1562. FLD_DES6
  1563. FLD_POP6
  1564. FLD_UNQ6
  1565.    IF 
  1566. FLD_BRO7
  1567. FLD_GET7
  1568. FLD_DES7
  1569. FLD_POP7
  1570. FLD_SAY7
  1571. FLD_SHW7
  1572. FLD_TXT7
  1573. FLD_SHW15
  1574. FLD_TXT15
  1575. OPT_GET15
  1576. FLD_DES15
  1577. FLD_POP15
  1578. OPT_SAY15
  1579. OPT_TXT15
  1580. D:\DMAIL4\
  1581. SCR.FXP
  1582. D:\DMAIL4\SCR.PRG
  1583.